perm filename IN2[P11,LCS] blob sn#341667 filedate 1978-03-10 generic text, type T, neo UTF8
PRECEDE;
SRT←12800;
INS 0 1;<   INSTRUMENT 1   
OSC P4 P7 B2 F1 P30;
RAH P5 P6 B3 P28 P27;AD3 P5 P3 B3 B3;<P5 SHOULD HAVE 1/2 FREQ TO BE ADDED.      
OSC B2 B3 B2 F2 P29;
OUT B2 B1;END;<ALL PARAM NUMS ARE 2 LESS THAN IN BOOK!

GEN 0 1 1 .01 0 .99 25
.99 400  0 511;<GEN INPUT MUST ALWAYS START NEW LINE!
GEN 0 2 2 .7 .5 0 .4 4;<F2 , 3 HARMONICS (1,2,4)     
INSTRUMENTS;
BUZZ 1 7 FREQ 3 5 6
END;
*

BUZZ 0 1 1;     INSTRUMENT 1=BUZZ, BEGIN TIME=0,    
P2 1;P3  300;P5  200;       
P6 5;
P4 1000;END;      
RUN;